home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Taifun
/
Taifun 025 (1987-08-15)(Ossowski, Stefan)(DE)(PD).zip
/
Taifun 025 (1987-08-15)(Ossowski, Stefan)(DE)(PD).adf
/
Graph
/
help.c
< prev
next >
Wrap
C/C++ Source or Header
|
1987-03-08
|
9KB
|
305 lines
/****************************************************************************/
/* Program: Graph It II (The C Program) */
/* SubModule: help.c 1-20-87 */
/* CopyRight By Flynn D. Fishman Januar 1987 */
/* Fühl dich frei diesen Source Code zu kopieren und zu ändern */
/****************************************************************************/
/* Dieses Modul enthält die Title Page, den Hilfs Text und die Suboutinen
für den Help Screen */
#include "graph.h"
static char *(HelpPages[]) =
{
"0",
"Graph It II The sequal In 3D",
"By Flynn D. Fishman Copyright January 1987",
" ",
"Fühle dich frei dieses Programm zu kopieren und weiter zugeben.",
"Es ist verboten mit diesem Programm Profit zu erzielen oder den",
"Namen des Autors zu ändern.",
" ",
"Klicken Sie das ? Icon für Hilfestellungen oder das Y= Icon um ",
"eine Funktion einzugeben",
" ",
" Schreibe deinen Kommentar an:",
" Flynn D. Fishman",
" 32 WoodBrook Court S.W. Calgary",
" Alberta, Canada, T2W-4G1",
" oder UseNet (UUCP):ihnp4!watmath!watcgl!fdfishman",
" ",
" Übersetzt von A.U.G.E. 4000 ",
" ",
" ",
"1",
"Seite 1 Einführung",
" ",
"Graph It erlaubt Ihnen die Eingabe fast aller Funktionen.",
"Diese Funktionen stellt es dan in 2d oder 3d dar.",
"Funktionen werden über eine Befehlszeile eingegeben.",
"Viele Parameter können auch mit der Maus geändert werden.",
" ",
"Notizen:",
" 1. Dieses Programm ist noch nicht 100%ig fertiggestellt,",
" die Funktionalität des Prg. ist aber voll gegeben",
" 2. Der mathematische Sprachumfang ist sehr groß, kennt",
" Hirachie der Operationen, aber er versteht den Umgang",
" mit Klammmern.",
" 3. 3d Screens basieren auf 2d Screens.",
" 4. Das Programm beinhaltet keine Fehlermeldungen wenn Sie",
" bei der Eingabe von Funktionen einen Fehler machen.",
"2Icon",
"Seite 2 Icons",
" ",
"Die Icons auf der rechten Seite des Screens bedeuten folgendes:",
" ZOOM: vergrößert einen Teil des Graph durch klicken, halten" ,
" und loslassen der linken Maustaste.",
" MOVE: bewegt den Graph im Koordinatensystem auf die gleiche",
" Weise wie ZOOM.",
" COMMAND: erlaubt die Eingabe der Funktion oder anderer",
" Variabelen (später mehr).",
" HIDDEN SURFACE: wechselt zwischen dem Verdecken und Freigeben",
" der verdeckten Linien (nur beim 3d Graph).",
" HOME: setzt den Graph wieder auf Nullposition und setzt die" ,
" Variabelen wieder auf die Startwerte.",
" QUIT: beendet das Programm.",
" ",
" HELP: Zeigt diese Hilfstexte",
"3",
"Seite 3 Funktionen",
" ",
"Um eine Funktion einzugeben muß man zunächst das Icon anklicken,",
"dann die Funktion eingeben. Z.B.: y=sin(x), z=x-y , y=sin(t). ",
"Nach der Eingabe kann man noch andere Befehle eingeben oder durch",
"Eingabe einer leeren Zeile den Befehlsmodus verlassen. Wenn Sie eine",
"fehlerhafte Funktion eingeben, sind Sie nicht in der Lage den Modus",
"zu verlassen bis Sie eine Funktion ohne Fehler eingegeben haben.",
" ",
"Notizen",
" 1. Wenn Sie eine Funktion mit drei Variabelen eingeben schaltet",
" das Programm automatisch in den 3d-Modus.",
" 2. Um eine Funktion zu löschen müßen Sie nur 'y=' eingeben. Diese",
" schaltet in den 2d-Modus zurück",
" ",
"Der Parser beinhaltet folgende Funktionen:",
" cos, sin, tan, exp, PI, E, atan, asin, acos, ln",
" + - * / ^",
"4",
"Seite 4 andere Kommandos",
" ",
"folgende Befehle sind enthalten:",
"xstart= setzt den niedrigsten X-Wert.",
"xend= setzt den höchsten X-Wert.",
"xlabels= setzt die Schrittgröße auf der x-Achse.",
" (Noch nicht in dieser Version)",
" ",
"ystart= setzt den niedrigsten Y-Wert.",
"yend= setzt den höchsten X-Wert.",
"ylabels= setzt die Schrittgröße auf der x-Achse.",
" (Noch nicht in dieser Version)",
" ",
"detail= Die Anzahl der berechneten Pixel in der Funktion.",
" Z.B: detail=1 berechnet einen Y-Wert für jedes Pixel.",
" ",
"Beispiel:",
" xstart=-5, ystart=5, detail=5, yl=1",
"5",
"Seite 5 Andere Icons" ,
" ",
"x-expand: (unterer Schieber) bewegt Koordinatenkreuz ",
" auf der X-Achse.",
" ",
"y-expand: (rechter Schieber) bewegt Koordinatenkreuz",
" auf der Y-Achse.",
" ",
" " ,
" ",
" ",
" ",
" ",
" ",
"6",
};
Help(Window, parameters)
struct Window *Window;
struct Graph_Parameters *parameters;
{
int page, KeepGoing, status;
KeepGoing = TRUE;
page = FIRSTPAGE;
while (KeepGoing)
{
PrintPage(Window, page);
status = GetPush(Window);
if (status == FORWARD) page++;
if (page > LASTPAGE) page = FIRSTPAGE;
if (status == BACKWARD) page--;
if (page < FIRSTPAGE) page = LASTPAGE;
if (status == QUIT) KeepGoing = FALSE;
}
DrawWindow(Window, parameters);
PlotGraph(Window, parameters);
}
PrintPage(Window, page)
struct Window *Window;
int page;
{
int current_line, first_line, row;
int minx, miny, maxx, maxy;
char line[5];
if (page > LASTPAGE) return(FALSE);
minx = Window->BorderLeft;
miny = Window->BorderTop;
maxx = Window->Width - Window->BorderRight - XBORDER;
maxy = Window->Height - Window->BorderBottom - YBORDER;
DrawRectangle(Window, 2l, minx, miny, maxx, maxy);
sprintf(line, "%ld", page);
current_line = 0;
while(line[0] != HelpPages[current_line++][0] );
sprintf(line, "%ld", ++page);
row = 0;
first_line = current_line - 1;
while(line[0] != HelpPages[current_line][0] )
Print(Window, HelpPages[current_line++], row++);
if (HelpPages[first_line][1] == 'I')
DrawImages(Window, minx+12, miny+(ICONY+2) + 10);
}
struct TextAttr myfont =
{
"topaz.font",
8, 0, 0
};
struct IntuiText textout =
{
1, 0, /* Pen Colours */
JAM2, /* Drawing mode */
0, 0, /* Position offsets */
&myfont, /* Font */
NULL, /* Text (To insert later) */
NULL /* next string */
};
Print(Window, text, line)
struct Window *Window;
char text[];
long int line;
{
long int minx, miny, maxx, maxy;
long y;
minx = Window->BorderLeft;
miny = Window->BorderTop;
maxx = Window->Width - Window->BorderRight - XBORDER;
maxy = Window->Height - Window->BorderBottom - YBORDER;
y = miny + 2 + line * (ICONY + 2) / 2;
if ( y > maxy) y = maxy;
textout.IText = text;
PrintIText(Window->RPort, &textout, minx +5, y);
}
GetPush(Window)
struct Window *Window;
{
struct IntuiMessage *NewMessage; /* msg structure for GetMsg() */
ULONG class; /* used in message monitor loop */
USHORT code; /* used in message monitor loop */
long int x, y;
int no_button;
long int minx, miny, maxx, maxy;
minx = Window->BorderLeft;
miny = Window->BorderTop;
maxx = Window->Width - Window->BorderRight - XBORDER;
maxy = Window->Height - Window->BorderBottom - YBORDER;
PrintHelpIcons(Window);
while( NewMessage=(struct IntuiMessage *)GetMsg(Window->UserPort) )
no_button = TRUE;
while (no_button)
{
Wait( 1 << Window->UserPort->mp_SigBit);
while( NewMessage=(struct IntuiMessage *)GetMsg(Window->UserPort) )
{
class = NewMessage->Class;
ReplyMsg( NewMessage );
if (class == MOUSEBUTTONS)
{
x = Window->MouseX;
y = Window->MouseY;
if (y > maxy - 10)
{
if ( x < maxx / 3) return (FORWARD);
if ( x > maxx / 3 * 2) return (BACKWARD);
else return (QUIT);
}
}
} /* end of message lists */
} /* end of nobuttons */
} /* end of routines */
PrintHelpIcons(Window)
struct Window *Window;
{
long int minx, miny, maxx, maxy, x, y;
minx = Window->BorderLeft;
miny = Window->BorderTop;
maxx = Window->Width - Window->BorderRight - XBORDER;
maxy = Window->Height - Window->BorderBottom - YBORDER;
SetDrMd(Window->RPort, JAM2);
y = maxy - 2;
x = minx + 6;
SetAPen(Window->RPort, 3l);
SetBPen(Window->RPort, 3l);
Move(Window->RPort, x, y);
Text(Window->RPort, " Next Page ", 11l);
SetAPen(Window->RPort, 1l);
SetBPen(Window->RPort, 2l);
Move(Window->RPort, x-1, y-1);
Text(Window->RPort, " Next Page ", 11l);
y = maxy - 2;
x = minx + 6 + maxx / 3;
SetAPen(Window->RPort, 3l);
SetBPen(Window->RPort, 3l);
Move(Window->RPort, x, y);
Text(Window->RPort, " Go To Graph ", 13l);
SetAPen(Window->RPort, 1l);
SetBPen(Window->RPort, 2l);
Move(Window->RPort, x-1, y-1);
Text(Window->RPort, " Go To Graph ", 13l);
y = maxy - 2;
x = minx + 6 + maxx / 3 * 2;
SetAPen(Window->RPort, 3l);
SetBPen(Window->RPort, 3l);
Move(Window->RPort, x, y);
Text(Window->RPort, " Previous Page ", 15l);
SetAPen(Window->RPort, 1l);
SetBPen(Window->RPort, 2l);
Move(Window->RPort, x-1, y-1);
Text(Window->RPort, " Previous Page ", 15l);
}